INSTRUMENT CLARK;
OSCIL[10]( P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTA;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTB;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTC;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTD;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTE;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTF;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTG;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTH;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTI;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTJ;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTK;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTL;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTM;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTN;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTO;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTP;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTQ;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTR;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTS;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTT;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT TOOTU;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);< P6 IS TONE COLOR FOR 'TOOTA'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARA;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARB;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARC;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARD;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARE;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARF;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARG;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARH;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARI;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT CLARJ;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;   
INSTRUMENT CLARL;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITA;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITB;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITC;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITD;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITE;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITF;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITG;
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITH;    
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITI;    
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;
INSTRUMENT BRITJ;    
OSCIL[15](P4,15*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);
OUTA←OUTA+U2;
END;